﻿Public Class Logsandstats

    Private Sub Logsandstats_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        loadMysqlInfo()
    End Sub
    Private Sub loadMysqlInfo()
        Dim mh As MySqlHandler = MySqlHandler.getInstance
        Dim dbi As MysqlDbInfo = mh.getDbInfo
        mysqlinfo.Text = dbi.DbInfoToRTF
    End Sub
End Class